home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #1 / Amiga Plus CD - 1997 - No. 01.iso / pd / programmierung / mesa-1.2.8 / widgets / demos / cube.c < prev    next >
C/C++ Source or Header  |  1996-05-27  |  8KB  |  332 lines
  1. /* demo.c -- Demo program for the Mesa widget
  2.    Copyright (C) 1995 Thorsten.Ohl @ Physik.TH-Darmstadt.de
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 2 of the License, or
  7.    (at your option) any later version.
  8.  
  9.    This program is distributed in the hope that it will be useful,
  10.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; see the file COPYING.  If not, write to
  16.    the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  17.  
  18.    $Id: cube.c,v 1.14 1995/05/19 20:30:57 ohl Exp $
  19.  */
  20.  
  21. #include <stdio.h>
  22. #include <stdlib.h>
  23. #include <stdarg.h>
  24. #include <math.h>
  25. #include <X11/X.h>
  26. #include <X11/Intrinsic.h>
  27. #include <X11/StringDefs.h>
  28. #include <X11/Shell.h>
  29. #include <X11/Xaw/Command.h>
  30. #include <X11/Xaw/Form.h>
  31. #include <GL/xmesa.h>
  32. #include <GL/gl.h>
  33. #include <GL/GLwDrawA.h>
  34.  
  35. static char *RCS_Id =
  36. "@(#) $Id: cube.c,v 1.14 1995/05/19 20:30:57 ohl Exp $";
  37.  
  38. static GLint Black, Red, Green, Blue;
  39.  
  40. void quit_function (Widget, XtPointer, XtPointer);
  41.  
  42. void
  43. quit_function (Widget w, XtPointer closure, XtPointer call_data)
  44. {
  45.   exit (0);
  46. }
  47.  
  48. static void
  49. draw_cube (void)
  50. {
  51.   /* X faces */
  52.   glIndexi (Red);
  53.   glColor3f (1.0, 0.0, 0.0);
  54.   glBegin (GL_POLYGON);
  55.   {
  56.     glVertex3f (1.0, 1.0, 1.0);
  57.     glVertex3f (1.0, -1.0, 1.0);
  58.     glVertex3f (1.0, -1.0, -1.0);
  59.     glVertex3f (1.0, 1.0, -1.0);
  60.   }
  61.   glEnd ();
  62.  
  63.   glBegin (GL_POLYGON);
  64.   {
  65.     glVertex3f (-1.0, 1.0, 1.0);
  66.     glVertex3f (-1.0, 1.0, -1.0);
  67.     glVertex3f (-1.0, -1.0, -1.0);
  68.     glVertex3f (-1.0, -1.0, 1.0);
  69.   }
  70.   glEnd ();
  71.  
  72.   /* Y faces */
  73.   glIndexi (Green);
  74.   glColor3f (0.0, 1.0, 0.0);
  75.   glBegin (GL_POLYGON);
  76.   {
  77.     glVertex3f (1.0, 1.0, 1.0);
  78.     glVertex3f (1.0, 1.0, -1.0);
  79.     glVertex3f (-1.0, 1.0, -1.0);
  80.     glVertex3f (-1.0, 1.0, 1.0);
  81.   }
  82.   glEnd ();
  83.  
  84.   glBegin (GL_POLYGON);
  85.   {
  86.     glVertex3f (1.0, -1.0, 1.0);
  87.     glVertex3f (-1.0, -1.0, 1.0);
  88.     glVertex3f (-1.0, -1.0, -1.0);
  89.     glVertex3f (1.0, -1.0, -1.0);
  90.   }
  91.   glEnd ();
  92.  
  93.   /* Z faces */
  94.   glIndexi (Blue);
  95.   glColor3f (0.0, 0.0, 1.0);
  96.   glBegin (GL_POLYGON);
  97.   {
  98.     glVertex3f (1.0, 1.0, 1.0);
  99.     glVertex3f (-1.0, 1.0, 1.0);
  100.     glVertex3f (-1.0, -1.0, 1.0);
  101.     glVertex3f (1.0, -1.0, 1.0);
  102.   }
  103.   glEnd ();
  104.  
  105.   glBegin (GL_POLYGON);
  106.   {
  107.     glVertex3f (1.0, 1.0, -1.0);
  108.     glVertex3f (1.0, -1.0, -1.0);
  109.     glVertex3f (-1.0, -1.0, -1.0);
  110.     glVertex3f (-1.0, 1.0, -1.0);
  111.   }
  112.   glEnd ();
  113. }
  114.  
  115. GLfloat xrot, yrot, zrot;
  116.  
  117. static void
  118. init_display (Widget w)
  119. {
  120.   xrot = yrot = zrot = 0.0;
  121.  
  122.   glClearColor (0.0, 0.0, 0.0, 0.0);
  123.   glClearIndex (Black);
  124.   glClearDepth (10.0);
  125.  
  126.   glMatrixMode (GL_PROJECTION);
  127.   glLoadIdentity ();
  128.   glFrustum (-1.0, 1.0, -1.0, 1.0, 1.0, 10.0);
  129.   glTranslatef (0.0, 0.0, -3.0);
  130.  
  131.   glMatrixMode (GL_MODELVIEW);
  132.   glLoadIdentity ();
  133.  
  134.   glCullFace (GL_BACK);
  135.   glEnable (GL_CULL_FACE);
  136.  
  137.   glShadeModel (GL_FLAT);
  138. }
  139.  
  140. static void
  141. display (Widget w)
  142. {
  143.   glClear (GL_COLOR_BUFFER_BIT);
  144.   glPushMatrix ();
  145.   {
  146.     glRotatef (xrot, 1.0, 0.0, 0.0);
  147.     glRotatef (yrot, 0.0, 1.0, 0.0);
  148.     glRotatef (zrot, 0.0, 0.0, 1.0);
  149.     draw_cube ();
  150.   }
  151.   glPopMatrix ();
  152.   glFinish ();
  153.   XMesaSwapBuffers ();
  154.       
  155.   xrot += 1.0;
  156.   yrot += 0.7;
  157.   zrot -= 0.3;
  158. }
  159.  
  160.  
  161. static GLint
  162. alloc_color (Widget w, Colormap cmap, int red, int green, int blue)
  163. { 
  164.   XColor xcolor;
  165.   xcolor.red = red;
  166.   xcolor.green = green;
  167.   xcolor.blue = blue;
  168.   xcolor.flags = DoRed | DoGreen | DoBlue;
  169.   if (!XAllocColor (XtDisplay (w), cmap, &xcolor))
  170.     {
  171.       printf ("Couldn't allocate color!\n");
  172.       exit (1);
  173.     }
  174.   return xcolor.pixel;
  175. }
  176.  
  177. /* This is rather inefficient, but we don't mind for the moment,
  178.    because it works.  */
  179.  
  180. static void
  181. translate_pixels (Widget to, Widget from, ...)
  182. {
  183.   va_list ap;
  184.   char *name;
  185.   Colormap from_cmap, to_cmap;
  186.   XColor xcolor;
  187.  
  188.   XtVaGetValues (from, XtNcolormap, &from_cmap, NULL);
  189.   XtVaGetValues (to, XtNcolormap, &to_cmap, NULL);
  190.  
  191.   va_start (ap, from);
  192.   for (name = va_arg (ap, char *); name != NULL; name = va_arg (ap, char *))
  193.     {
  194.       XtVaGetValues (from, name, &xcolor.pixel, NULL);
  195.       XQueryColor (XtDisplay (from), from_cmap, &xcolor);
  196.       if (!XAllocColor (XtDisplay (to), to_cmap, &xcolor))
  197.     XtAppWarning (XtWidgetToApplicationContext (to),
  198.               "Couldn't allocate color!\n");
  199.       else
  200.     XtVaSetValues (from, name, xcolor.pixel, NULL);
  201.     }
  202.   va_end (ap);
  203. }
  204.  
  205. /* Just like the movies: do 24 frames per second. */
  206. unsigned long delay = 1000/24;
  207.  
  208. static void first_frame (Widget);
  209. static void next_frame (XtPointer, XtIntervalId *);
  210.  
  211. static void
  212. first_frame (Widget w)
  213. {
  214.   XtAppAddTimeOut (XtWidgetToApplicationContext (w),
  215.               delay, next_frame, (XtPointer) w);
  216. }
  217.  
  218. static void
  219. next_frame (XtPointer client_data, XtIntervalId *id)
  220. {
  221.   Widget w = (Widget) client_data;
  222.   first_frame (w);
  223.   display (w);
  224. }
  225.  
  226. static String fallback_resources[] =
  227. {
  228.   "*GLwDrawingArea.width: 300",
  229.   "*GLwDrawingArea.height: 300",
  230.   "*GLwDrawingArea.rgba: true",
  231.   "*GLwDrawingArea.installColormap: true",
  232.   "*GLwDrawingArea.doublebuffer: true",
  233.   NULL
  234. };
  235.  
  236. int
  237. main (int argc, char *argv[])
  238. {
  239.   Widget top, frame, mesa, quit;
  240.   XtAppContext app_context;
  241.   GLXContext glx_context;
  242.   XVisualInfo *vi;
  243.   Boolean rgba, doublebuffer, cmap_installed;
  244.  
  245.   top = XtVaAppInitialize (&app_context, "Cube",
  246.                NULL, 0,
  247.                &argc, argv, fallback_resources,
  248.                NULL);
  249.  
  250.   frame = XtVaCreateManagedWidget ("frame", formWidgetClass,
  251.                    top,
  252.                    NULL);
  253.   mesa = XtVaCreateManagedWidget ("mesa", glwDrawingAreaWidgetClass,
  254.                   frame,
  255.                   NULL);
  256.   quit = XtVaCreateManagedWidget ("quit", commandWidgetClass,
  257.                   frame,
  258.                                   XtNfromHoriz, mesa, XtNhorizDistance, 10,
  259.                   NULL);
  260.   XtAddCallback (quit, XtNcallback, quit_function, NULL);
  261.  
  262.   XtRealizeWidget (top);
  263.  
  264.   XtVaGetValues (mesa,
  265.          GLwNrgba, &rgba,
  266.          GLwNinstallColormap, &cmap_installed,
  267.          GLwNdoublebuffer, &doublebuffer,
  268.          GLwNvisualInfo, &vi, NULL);
  269.  
  270.   /* create a visual context */
  271. #ifdef XMESA_H
  272.   /* This simple example burns _a_lot_ less CPU cycles if the double
  273.      buffering utilizes a pixmap.  glXCreateContext() forces us to use
  274.      an Ximage.  Therefore it is faster (though not portable) to use
  275.      XMesaCreateContext() explicitely.  */
  276.   glx_context = XMesaCreateContext (XtDisplay (mesa), vi,
  277.                     (GLboolean) rgba,
  278.                                     GL_FALSE,  /* alpha */
  279.                     (GLboolean) doublebuffer,
  280.                                     1, /* depth size */
  281.                                     0, /* stencil size */
  282.                                     0, /* accum size */
  283.                     GL_FALSE, /* ximage flag */
  284.                                     NULL);
  285.   XMesaBindWindow (glx_context, XtWindow (mesa));
  286. #else /* not Mesa */
  287.   glx_context = glXCreateContext (XtDisplay(mesa), vi, 0, GL_FALSE);
  288. #endif /* not Mesa */
  289.  
  290.   GLwDrawingAreaMakeCurrent (mesa, glx_context);
  291.  
  292.   if (rgba)
  293.     {
  294.       Black = Red = Green = Blue = 0;
  295.  
  296.       if (cmap_installed)
  297.     {
  298.       /* In RGBA mode, the Mesa widgets will have their own color map.
  299.          Adjust the colors of the other widgets so that--even if the rest
  300.          of the screen has wrong colors--all application widgets have the
  301.          right colors.  */
  302.              
  303.       translate_pixels (mesa, quit,
  304.                 XtNbackground, XtNforeground, XtNborder, NULL);
  305.       translate_pixels (mesa, frame, XtNbackground, XtNborder, NULL);
  306.  
  307.       /* Finally warp the pointer into the mesa widget, to make sure that
  308.          the user sees the right colors at the beginning.  */
  309.  
  310.       XWarpPointer (XtDisplay (mesa), None, XtWindow (mesa),
  311.             0, 0, 0, 0, 0, 0);
  312.     }
  313.     }
  314.   else
  315.     {
  316.       /* Allocate a few colors for use in color index mode.  */
  317.  
  318.       Colormap cmap;
  319.       cmap = DefaultColormap (XtDisplay (top), DefaultScreen (XtDisplay (top)));
  320.       Black = alloc_color (top, cmap, 0x0000, 0x0000, 0x0000);
  321.       Red   = alloc_color (top, cmap, 0xffff, 0x0000, 0x0000);
  322.       Green = alloc_color (top, cmap, 0x0000, 0xffff, 0x0000);
  323.       Blue  = alloc_color (top, cmap, 0x0000, 0x0000, 0xffff);
  324.     }
  325.  
  326.   init_display (mesa);
  327.   first_frame (mesa);
  328.  
  329.   XtAppMainLoop (app_context);
  330.   return (0);
  331. }
  332.